MMFileOps Waveplayer System Form1* MMFFileLbl File &Name: MMFDirLbl &Directories: MMFTextBox *.wav MMFCurDirLbl MMFDir MMFFile MMFDrvLbl Dri&ves: MMFDrive PlayCmd Play Sound MFErrBox HelpCmd QuitCmd LastChange @ Form_Load0 LAB_CurrentDir Caption| DIR_Dirs Path\ HeightR FIL_Files Form_Unload\ Cancel TRUE' FileFormL CancelOp ProcessFileSpec FileSpec MsgBoxResponsep FALSE Pattern TXT_TextBox MB_YES HighLightTextBox SelStart" SelLength IsFileName Indexe OldDir NewDir" BTN_Cancel_Click DIR_Dirs_Change DIR_Dirs_Click FIL_Files_Click2 Filename FIL_Files_DblClickm BTN_OK_ClickJ FIL_Files_PathChange FIL_Files_PatternChange5 Listm ListIndex TXT_TextBox_Change DRV_Drives_ChangeE DRV_DrivesO Drive LAB_CurrentDir_Click LAB_Drives_Click, LAB_Drives_Change LAB_Directories_Click LAB_FileName_ClickE LAB_CurrentDir_Change MMFile] MMFileOpsZ NeedToSavez MMF_OK_Click MMF_Cancel_Click MMF_TextBox_Change MMFDrive_Change MMFDir_Change MMFDir_Click MMFFile_DblClickd MMFFile_Click MMFFile_PathChange, MMFFile_PatternChange7 MMFFile MMFTextBox_Change MMFDirO MMFTextboxv MMFOkBtn_Click MMFCancBtn_Click MMFDrive0 MMFCurDirLbl MMFCurDirLbl_Click MMFFileLbl_Click MMFDirLbl_Click MMFDrvLbl_Click MMFile_Click file, ID_YES IDYES~ MPFCurDirLblD MPFDiru MPFFile MPFileOps MPFTextbox MPFDrive_Change MPFDrive MPFDir_Change MPFDir_Click MPFFile_DblClick MPFOkBtn_Click0 MPFFile_Click MPFFile_PathChange MPFFile_PatternChangeO MPFTextBox_Change MPFCancBtn_Click MMCombo MMComBox Command1_Click WavPlay_Click ListCount FName, OpenStr MMSend PlayP CloseM MMComMMSendQ CloseW MFSend: MLeni MMErr mciSendString hWndr mciGetErrorString Timer1 Enabled PlayWait| MMErrBox MFErrBox MFErr CurSnd WavOpen WavClose4 NewPlay WavPlayV ExitSub PlayCmd_Click MMFFIleList FileList QuitCmd_Clicka OldPlayCmd_Clicky Sound sndPlaySound Flag? MMHelpF HelpCmd_Click HelpErrm HelpLine HelpFile MMHelpBox HlpExit RunPath HelpPath remember what changed last current filename List pointerm flag for new file selection path to help filet Form_Load WAVHLP get help path from env string Show full path name in a label No controls have been modified *.wav" \wply.wav" startup voice message Form_Unload Don't unload form, just hide it Notify top form of cancellation HighLightTextBox MMFTextbox.SetFocus MMFDrive_Change change the MMFDir control path, it will pass the change on to the MMFFile control MMFDir_Change propagate directory changes to other controls MMFDir_Click remember that the Dir control changedc MMFFile_DblClick we have a final selection from the File Save dialogn push OK button for user...e MMFFile_Click echo the selected name in the Text box MMCombo.MMComBox.AddItem MMFFile.Filename MMFFile_PathChange Show the current search pattern in the MMFTextbox controln MMFFile_PatternChange MMFTextBox_Change MFSend Err: " QuitCmd_Click close all" PlayCmd_Click \nofile.wav" No File voice message no file selectedl HelpCmd_Click \wavepl.txt" SystemExclamation" Can't open file [wavepl.txt]; see install docs WavePlayer Help"